#include "ti83plus.inc"
#include "app.inc"










defpage(0, "S.A.D.")

;  Main app control begins here
StartApp:
Start:

 B_CALL _ClrLCDFull
  xor a                    
  ld (curCol),a          
  ld a, 0
  ld (curRow),a  
 ld hl, AprilFoolsString
 ld de, OP1
 ld bc, 12
 ldir
 ld hl, OP1
 B_CALL _PutS

 
  xor a                    
  ld (curCol),a          
  ld a, 1
  ld (curRow),a  
 ld hl, AprilFoolsString2
 ld de, OP1
 ld bc, 12
 ldir
 ld hl, OP1
 B_CALL _PutS
 B_CALL _getKey
 B_CALL _JForceCmdNoChar
 
Validate()

AprilFoolsString:

 .db "HAPPY APRIL",0

AprilFoolsString2:

 .db "FOOL'S DAY!",0